00100	
00110	PRINT "THE SIMULATION OF THE CASTING OF A PAIR OF DICE"
00120	PRINT
00130	PRINT "PLEASE TYPE IN NUMBER OF TIMES THE DICE"
00140	PRINT "ARE TO BE CAST"
00150	INPUT N,Z
00152	FOR X=1 TO Z
00154	D1=RND(0)
00156	NEXT X
00160	IF N<1 THEN 250
00170	FOR X=1 TO N
00180	D1=INT(RND(0)*6)+1
00190	D2=INT(RND(0)*6)+1
00192	PRINT
00200	PRINT D1;"=OUTCOME OF ONE DIE OF THE PAIR"
00210	PRINT D2;"=OUTCOME OF THE OTHER DIE OF THE PAIR"
00220	P=D1+D2
00230	PRINT P ;"=SUM OF THE CAST"
00240	NEXT X
00250	PRINT "GOODBYE"
00260	END